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‘ FUNCTIONS FLAGGED BY AID2 


‘TABLE I 


4-28-76 


MOD 


POLAR 


REAL 


᾿ς ROUND 


SETSIZE. 


"SIGN. 
SIGNUM 
- SIN 


SQRT 
TCP. 
TEL 
TELL 
TRUNC 
WAIT... 
YEAR * 


SUPER FORTRAN CONVERSION STEPS. Σ᾽ al fi τὰ 
FEB. 27, 1976 . 


The following is a list of steps required to-.convert a TYMCOM IX uber Fortran 


program ἐδ the TYMCOM X. Depending on the Super Fortran program code, some 


of the steps listed will not be necessary. An asterisk (*) indicates that 


compilation of the program on the TYMCOM X may Pe locate the. Pee 


problem area being discussed. 


Table II (attached) shows the Super Fortran differences on the two ΘΟΙΡΌΘΘΣΒ 
and methods for handling them. Also, a Super Fortran esnvansion Aids 
document, - (attached), describes the fiction and usage of each conversion 


aid. 


PART I 
1) Log into System 9 or 15, wherever the programs to be converted are located. 


2) Run the program to be converted through (G2CONVERT)@SFAID1. This aid 


checks for variable names longer than 6 characters. To run AID1, type 


_ GO _(G2CONVERT)@SFAID1_, 


- The program will prompt for input file name and will give a filename 
for the file generated with line numbers containing invalid variable 
: 8 a ᾿ A ᾿ 
3) Enter the program-into EDITOR and rename the variables which were flagged 


by ATD1 as greater than 6 characters. Write these changes to a file. 


4) Running the program ene AID2 is optional; this aid flags functions 
any ΤΕΣ which may be incompatible between the TYMCOM-Ix and the 
TYMCOM-x, Table I shows Puce ahenes this aid will flag. To rum 
AID2 type ΕΣ ' 


60 περι ὦ 


The program will prompt fn an peee filename and will print flagged — 


names on the terminal. 


5) AID3 is also optional; it ae instances where oe value of a DO Loop 


index is changed by an assignment within the DO loop. To run AID3, type 


60 (ceconvere )esrarn3, Beal αν εἰς, δες οὐ 


The program will ρῶν for an input filed and will output to the 


terminal. : 


Run the modified progran through (Gacowvann) @SFATD,. ‘This’ step must 


be done to remove line numbers and to accomplish other necessary syntax 


modifications. ‘See attached Super erie Conversion Aids document for 


8 list of items that will be changed. 


To run AIDA, a 
Go (C2OONVERT) @SP ALD, 


The program will preupe for input and eutpes file names. The input filename 
should be the name of the file which contains corrected variable names. 

. The output file contains TYMCOM-X Super Fortran syntax (i.e. this output file 
will probably not execute on TYMCOM-IX Super Fortran). NOTE: This output file 


ϑὥ Should be used for all further Brocessing. ΄- 


Reel 


SESS ES EOE PORNBB SAE Yee RC AMEN iY 


OG 


o>. 
if 


UD 


7) AIDS flags the following: 


8) 


9) 


Soe RS Sees ea ee tage acces panera wanictoucemaneat Ω 
Ἷ 


a sO, 
ῃ 


ἐπῆε, ον ἢ 


a) LINK statemnts = ὃὅ5ὅ - vile 
b) Implied DO loops not in 1.00 statements : 
c) Dummy declaration statements (ise. declarations edna ΤΟΣ 
ἃ) Use of .EOR. or De. logical operators 


e) Illegal TYMCOM-X file names used in OPEN statements 
This aid may be omitted if the program contains none of the above. — 
To run AIDS, type — 


GO_(G2CONVERT)@SFAID5 τ oe 


The program will prompt for.an input filename which should be the name 
-of the output file resulting from AID, processing. Only differences are 


flagged and printed at the terminal; no output file is generated. 


The statements flagged by aids may be corrected at this point. See 
Table II for methods of correction. Items 11 through 24, in Part II 
of ‘this document also apcrses these needed changes, some of which will become 


more apparent after compilation on the TOs 


bony thenmateies file to your TYNCOM 3 x account. This can be done by 
TELECOPY on System 9 or System 15 if the file is small (50,000 cece); 


by cls operations write the file to tape via a Batch Request. 


To obbedn instructions for running TELECOPY, type | 


~TELECOPY 
. 


:HELP 
Pw 


ap 


“ἐν 


10) 


. 11) 


? A oi 


i 


Instructions for magnetic tape transfer of files vie Batch Request 
from the TYMCOM-IX to LMSC's TYMCOM-X (System 88) are found in 


Timeshering- Services Bulletin Vol, It, #2: TrP#) 


If required, run the program through (G2CONVERT )@SFAT D6 on System 88. 

ALD6 breaks long lines (up. to 256 characters) into shorter lines with 

the user specifying the length of the ahoater line. This is necessary 
to break up long comment statements: which result from the removal of line 


feeds (a previously used aid, AIDA, has removed line feeds). 


to run AID, type" Re St: Ἔν Bee ὡς : δ 


60 (G2OONVERT) @SFATDS , οι 


The program will ‘prompt for input and output file names. The input 
file name should be the name of the file copied from the. ἸΧΗΘΌΜΕΣ, 


The user will also be prompted for desired line length. 
Enter SFO on System 88. Wea the program into SFO nig the command: 


ENTER ‘4 £10000. FROM cian, 


where 1 10000 gives the line range of your program, and filename is the 


latest modification of the ie ay being ponvertads. 


PART II 


Correct the statements flagged by any of the conversion aids. The methods . 


- of handling flagged statements are described in the ae ‘temas 


ϊ 
‘ A 
᾿ ες τ t i . 
ster i: STS TEES eS δι. i tS win LNT Meena sips ine enaaeacertmeetaikiiciat:| nth talkie Siaaelatt Kematn enon pen memaanen. ΜΆ render n 
Ἅ , ᾿ τὶ 


} ἢ 


7 NOTE: ALL OF THE FOLLOWING CONVERSION STEPS NEED NOT BE ACCOMPLISHED IN THE 


, ORDER LISTED. HOWEVER, THOSE ITEMS PRECEDED BY AN ASTERISK ARE MORE 


‘EASILY DETECTED AFTER THE PROGRAM HAS BEEN COMPILED. 


If EDITOR is used to correct. any of these items, line numbers are 


stripped. After EDITOR has been used, the program must be reentered into 


SFO as shown in item 10. 


- nae 
12) Compile the program. — 


13) Make sure the first six characters of filenames are unique. 


-- 


14) Make sure that the main program includes all common blocks used in 411. 


- 


subprograms. Also note that af ‘a common block varies in size, the longest - 


example a) 


illegal 
c MAIN PROGRAM 


COMMON /4/X(100) 
CALL SUBA. 


‘ 


Ke 


ε 2 ὶ SUBROUTINE Βα ὁ 
COMMON/A/X(100) 
COMMON/B/Y (20) 


CALL. SUBB 


¢ 


SUBROUTINE SUBB 
;. 


— ΠΤ COMMON/B/¥ (20) 


᾿ 


reference must be in the main program. 


C 


. 


legal 
MAIN PROGRAM 
COMMON / 8/2100) , 
COMMON /B/Y (20) 
CALL SUBA 


> 


SUBROUTINE SUBA 
COMMON/A/X(100). 
a ee 


COMMON/B/¥(20) ° | 


.- 
a 


v 


CALL SUBB 


\ 
SUBROUTINE SUBB 


COMMON/B/Y (20). 


+ 
: . ἢ 
example b ΓΑ ΡΣ ες { 


illegal ᾿ 7 legal 
C ΜΑΙΝ PROGRAM ΠΝ c MAIN PROGRAM 
CoMMON’C/A(10),B(10) ~ “common/¢/A(10) B(10), x(20) 
CALL SUBC : CALL SUBC 
. ὁ 
SUBROUTINE ΒΒ. SUBROUTINE SUBC ° 
. 2 
commni/o/4(10), B 60), Χ(20) -COMMON/G/A(10) ,B(10) ,X(20) 
15) Check for modification of the index of a DO loop within the loop. 
| The example : ᾿ 
| Ps Do 10 1=1,10 : ταν σον ΠΣ; . ' τ ee τ a SE ΤῊΣ pn Sel Ἶ 
ὌΧ : | Ἶ 
Se ' 4 
1Ξ15 ᾿ς 


10 CONTINUE 


is invalid and. mast be , modi fied. 


16) Change generic functions to explicit finottons: Generic functions on the 
YMCOM-IX will accept arguments ‘of various types, while explicit functions | 
on the TYMCOM-K require that the function type be the same as the | 
prem t type. For example, the SIN function on the TYMCOM-IX will. accept 
single precision, double precision or complex arguments. On the TYMCOM-K, 


SIN, DSIN or CSIN must be πον to match the type of the argument. 


& Ἐ 
2 


*17) 


#18) 


If any of the functions listed below were flagged by AID2, determine the 
type of the argument(s) and then decide which functions to use from 
Tableg Il and-titc Sfo rts ἀξ t f* qe? 32- 36. 


'ἜΧΡ .-. Β0Ὰ1 INT 


LOG MOD IBLE 

τραῖο ὁ «BS a 

SIN MAX - 

cos MIN : 
ATAN SIGN 

ae °° OM 


Change the names of functions that have different names on the TYMCOM-IX 
and the TYMCOM-X. These were flagged by AID2. Functions requiring name 
changes are listed below. See Table Ii for methods of modifications. 
TYMCOM IX ο΄ TYMCOM X 
TRING ὃ AINE 
The following functions will be flagged by AID2. These capabilities 
do not currently exist on the TYMCOM-X. Work is in process to ‘provide 


these functions » 80 this τὲ may be modified at any time. Consult 


. Timesharing Services for Serene status of these items dea suggested . 


methods or alternatives. © 


; a scot ae nana bet csi ones σ -onim inane geemantn te ont cotnecin lit hen onan imei i einem Bt ttt RE ip aig tec tncsrenc ota Minaiactner carbon a 


7 


#21) 


| #19) 


#20) 


#22) 


#23 ) 


“¥24) 


#25) 


26) 


27) | 


28) 


; 
Check subscript range statement and change to the proper TYMCOM-X syntax. 


An example is given below. 


TYMCOM-IX: DIMENSION A(20:30) 


be 


ik preter 


TYMCOM-X: . DIMENSION A(20/30) ἡ 


Correct IF or IF-ELSE statements found in error by the compiler. — 


‘Correct multiple statements after IF statements that were flagged by the — 


oe, : 
: Ἔ 


compiler. ~~ 


Move function statements and declaration statements above the first 


executable statements in the main program and all subprograms. 
Delete blank lines that were not deleted by the conversion program. . 


If random access files are used, change respective READ or WRITE statement 


syntax when file position is indicated. 
example?  pyMCOM-IX: Read (6,3000) (1415) Array 


. TYMCOM-X: Read (6#1+15,3000) Array . 
Change square brackets to parentheses. This can be done in EDITOR using 
the SUBSTITUTE command. , : 


τς td 


‘Save the updated file. oe τ oe oe 


Run the program and compare results with a TYMCOM-IX run. 


Correct any errors and document TYMCOM-X program. 
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- οι ψ 
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ἘΣ 
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Fee 


ΕΣ  SSFAIN 
1. FUNCTION ae OG 


SSFAIDL ΓΞ A PROSRAM WHICH FLAGS VARIABLE NAMES WITHIN A TYMCOM Ix. 
SFO PROGRAM HIHICH ARE IN EXCESS OF 6 CHARACTERS IN LENGTH. | 


SEFAIDNI NOES NOT AUTOMATICALLY CONVERT THE FLAGGED VARIABLE 


NAMES TO NEM NAMES. HOWEVERs ΦΞΡΗΙΙΙ TOES GENERATE A LISTING OF . ie 
ALL LINES WHICH CONTAIN THE YVARIAELE NAMES WHICH ARE IN EXCESS ge 
& CHARACTERS, ae . t 4 os . anes ae | 
Ἐν Ὁ ἂς ᾿ 3 piety” Pe " ἐν Ϊ 
PLEASE NOTE THAT THE ONLY WARTABLES WHICH WILL BE AMBIGUOUS TO THE 
TVNCOM SS SFO COMPILER ARE VARIABLE NAMES WHICH ARE IDENTICAL IN - 
THE FIRST καὶ CHARACTERS OF THE VARIABLE NAHE τ - 
FOR EXAMPLEs | ; : ΒᾺΝ 
THE FOLLOWING VARTABLE Nemes COULD CAUSE UNFORSEEN PROBLEMS - 
IN TYMCOM καὶ SFor: - | | ΝΣ oe gigd τ 
PROJECT1 i Pex ee | 
PROJECTS : Oe woven er ee 
PO μημενεῃ. THE FOLLOWING VARTABLE NAMES WOULD NOT. CAUSE ANY” 
PROBLEMS OF AMBIGUITY IM TYMCOM αὶ FoR: ud ease ΠΣ τς, : 


PROJIFLAG 
PROJZPLAG 


'. RULES 


THE ΜΕΤ FILE TO SSFAIDI MJZT BE A TYMCOM Ix seo FROGRAM WHICH 
HAS BEEN SAVED IN SYMEOLIC FORM ONLY AND WHICH CONTAINS ΤΗΕ o>. 
SFO NUMBERS. «ILE. A FILE WHICH DOES NOT oe eee be PPG ae =e 
CONTAIN SFO NUMBERS WILL HOT BE PROPERLY ANALYZED), - - τ ΚΣ a 


when οὐκ 


» LIMITATIONS 


VARIABLE NAMES BEGINNING MITH THE FOLLOWING SETS oF CHARACTERS , 
WILL NOT BE. PROPERLY DETECTED: αἰ : | 
oe CALL. a ᾿ [ . - Soa τ ᾿ 
ACCEPT a2 % . 
TLEPLAY " δος, με 
RAMDOUT δ, εἶ, ἢ 
τ  ASUBSTRE a j 
“POSITION 


SMBOL IC! af - ἧς ς, 1 
(S075 *FOLCOWED EY ἢ DIGIT. Εν διε GOTOLFLAG? 
Ὁ "π΄ «FOLLOWED BY A DIGIT. E.6.: DOIFLAG > - 


FOP EXAMPLES its | 
THE FOLLOMING VARIABLE NAMES WILL BE DETECTED? ~ 
AAABRECCC 


BOTORARA 
DOAYZAECIE 


i 


THE FOLLOWING VARIABLE NAMES WILL NOT BE FROPERLY DETECTED: . 


CALLFLAG 
DISPLAYARS 
ΞΏΤΗΙ ΚΎΖ 
DOFFLAGYAR 


4, SAMPLE PLM | 


gos 


tel 


᾿ Ο 
3 


on - me eee Sos -τοῦ -τὍοὸ.ν»στοὖὦ'ἃἣ͵.͵ε σ΄. - σ΄ “.“..-.---- ------΄..--. ...... .--.--.-.......- ὦ 
"ἃ rm 
ae 
oe - 
ἐ - 
‘ Ε 
᾿ i 
- ΕΣ Σ ¥ 
oak a 
> τ 
JSFALDS 


1. FUNCTION oe Ml 
ASFAIN2 If A PROGRAM ΜΗΙΌΗ FLAGS CERTAIN - SFO FUNCTIONS AND - 
COMMANDS WHICK MAY BE INCOMPATIBLE BETWEEN THE TYNCOM 1x 
AND THE TYHCOM x, 


THE SPECIFIC FUN TIONS ann COMMANDS WHICH ARE FLAGGED ARE 
CONTAINED 34 THE FILE NAMED arden ΦΕΕΒΊΒΕΎΒΕΕΕ, A LISTING OF 
THIS TABLE AS OF 2-1-76 ἋΣ ATTACHED, a : 7 


@SFAILE DOES NOT ATTEMPT To GENERATE NEW SOURCE CODES TT MERELY FLAGS 


SHSPECIED INCOMPATIBILITIES. Ἢ ἐν δ᾿ 
IF THE ALD ENCOUNTERS ΒΗ OPEN STATEMENT FOR A RANDOM FILE 

A SECOND PASS IS MADE THR THE FILE AND ALL FEAD ΠΡ shia ae 
STATEMENTS: REQUIRING FOSYNTAX CHANGE ARE FLAGGED, 


τῶν RULES: 


THE INPUT FILE Τῇ SSFAIDE MUST EE Ἢ TYMCOM IX SFO PROGRAM WHICH 
“AS EEEN SAVED IN SYMBOLIC. FORM ONLY AND WHICH CONTAINS THE 


SFD LINE NUMBERS. <1.€. Η FILE WHICH DOES NOT ESS 
CONTAINS SFO LINE NUMBERS WILL NOT BE ‘PROPERLY ANALYZED. ae 


oo 


» LIMITATIONS . 


NO LIMITATIONS ARE KNOWN AT THIS. TIME. τ 


4. SAMPLE RUN 


δε, 
᾿ 


, " t i ὡ: ; 
Gps é 
ue τ 
: aSFAIDS 
i. FUNCTION : 
SSFAIDS DO LOOP INDEX MOGTFICATION VIA AN ASSIGNMENT 
STATEMENT CONTAINED WITHIN THE LOOP. 
#SFAIDS TOES NOT GENERATE NEW SOURCE CODE} {τὶ 
IERELY FLAGS THE OCCURRENCES. . Pisa EE la 
δ. RULES ἐν hela, eee eae 
THE INFUT FILE TD @SFAIDG MUST BE A TYMCOM IX SFO PROGRAM WHICH 
HAS BEEN SAVED IM SYMEDLIC FORM ONLY AND WHICH CONTAINS THE pe 
SFO LINE NUMBERS. «1.6. A FILE WHICH DOES NOT Ὁ - ig ae ee 
CONTAINS SFO LINE, NUMBERS WILL NOT BE PROPERLY ANALYZED) « eats 
3. LIMITATIONS nee | | ΣῊΝ 
ΦΞΕΗ͂ΙΤΞ ONLY FLAG? CASES WHERE THE INDEX VARIABLE IS CHANGED VIA 
© au ASSIGNMENT STATEMENT. IT DOES NOT FLAG CASES WHERE THE INDEX ΜΠ 
VARIABLE 1S CHANGED V1A AN ACCEPT OR READ STATEMENT. : 
4. SAMPLE RUN Ἢ 
Secs tety CREE a : ; 
i : : 
4 Ἃ 


"“- 
ay 


ae 


ee cores ν 


ALL MODIFIED STATEMENTS ARE DISPLAYED ALONG WITH. °- 


i 


A. REMOVES LINE HUMBERS.: 


oT. CHANGES "Ce" COMMENTS To COMMENTS. 


| 


pe 


τῶν, Ne nae ee ¢ 


BE. STATEMENT LABELS ARE ALIGNED AND STATEMENTS BRE 
INDENTED In A FIXED FORMAT “SEE EXAMPLE. | 

mh. REMOVES LINE- FEEDS (ΕἼΝΕ, eae wae ee THIS” 
PRODUCES LONG LINES 


E. MODIFIES SIMPLE MULTIPLE STATEMENTS IN. IF "STATEMENTS: 
ENCLOSED IN FARENTHESES “SEE EXAMPLES. 50s leo 
F. pepe eve ea IF ee ELS ie STATEMENTS Cree 
 ERAMPLE?: ᾿ : 
6. MODIFIES {ΕΞ -τρξη- ELS Ε STATEMENTS. NESTED To A LEVEL 
OF THREE DEEP. 


Ἢ. MODIFIES MULTIPLE. STATEMENTS ENCLOSED IN PARE ἜΣ eS 


 ENTHESES IN SINE ΠΈΡΙΞ ΠΕΈΤΕΤ: ΤΕῈΞ ΤΗΕὴ- ELS 53 STATEMENTS. : 


rags 


A. THE INPLIT FILE MUST BE AC STA NDARD TY none 1x SFORTRAN PROGRAM 
© WITH CONVENT TONAL TYMCOM 1% SFORTRAN LINE HUMBERS 


LIMITATIONS 


A. THE CONVERSION AID MAY GENERATE STATENET ST WITH. LABELS 
(BEGINNING WITH 9000 IN INCREMENTS OF DNE<i>. THESE... 


: LABEL» MAY CONFLICT. WITH Estate STATEMENT LABELS. 
Ἶ . εἴθε, : 3 : 


THE NEM CODE GENERATED BY THE AID. THE USER SHOULD. | 
EXAMINE THE TRANSLATED CODE LOGIC: TO DETERMINE: 
THAT ‘THE: NEM CODE 1S EQUIVALENT ΤΠ THE BLD 5 τ 


τος THIS FIT WILL NOT PROPERLY RECDGNIZE. ΤΕ. OF IF-ELSE. TYPE: τ 


STATEMENTS WHICH HAVE EMBEDDED BLANKS EXAMPLE: ee ee 
100 Fea. ST. BGO TO 10. Ε1 ΞῈ - DISPLAY “NOT “ΠΟΒΙΕΊΕΙΝ δ ὙΠ 


eos 


> SAMPLE 


᾿ς 


Te 


hs 


ae ee OSFALDS 


FUNCTION 


FLAGS LINK STATEMENTS. 


FLAG IMPLIED TO =TATEMENTS IN NON-I/O TYFE STATEMENTS. 


FLAGS TIMENS LONING OF DECLARATIONS USING 


'ΦιΦ OF ὁ ΠΕ : 


spa 


FLAGS THE USE OF -EOR. AND . IMP. OPERATORS. 


FLAGS THE USE OF IMPROPER TYMCOM X FILE NAMES IN OPEN STATEMENTS. Ey 


RULES 
Lae FILE SHOULD HAYWE BEEN PROCESSED Bye ΒΠ ἘΠΕ: PRIOR TO) 
EXAMINATION BY THIS AID. ee ' 
OUTPUT CONSISTS OF ΞΕΦΙΕΉΤΤΡΙ. LINE NUMBERS AND THE © 


ERROR FLAGS. THESE LINE NUMBERS CORRESPOND TO EDITOR | 
LINE NUMBERS 


LIMITATIONS 


| IT 1Ξ PEROMMENDED THAT THIS PROGRAM FE SERUM 


AFTER CORRECTION ARE MADE. 


CERTAIN VARIABLE HAMES CONTAINING LINK MAY: CAUSE 
A FALSE FLAGGING OF A LINK STATEMENT. 


SOME STRING CONSTANTS MAY TRIGGER FALZE FLAGGING ὁ 
OF IMPLIED no MOUIFIERS. ον 


“EXAMPLE 


